﻿Imports RunEnv
Module mdlMain
    Public gcnnDBMain As CDBConnection = CRunEnv.DBConnection

    Public Sub MainException(ByVal ex As Exception)
        MsgBox(ex.Message, MsgBoxStyle.Exclamation, "系统提示")
    End Sub
End Module
